﻿Public Class ven_facttam

   
    
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        If rbtramo1_facttam.Checked = True Then
            kb = 1.24 * (d ^ (-0.107))
        End If
        If rbtramo2_facttam.Checked = True Then
            kb = 1.51 * (d ^ (-0.157))
        End If
        Me.Close()
    End Sub
End Class